stroka=input()
c=stroka.split()
if (len(c)<=1):
    print("мало данных для AHализа")
else:
    Zag=0
    lat=0
    dlin=0
    dev=0
    maxs=""
    for i in c:
        if(i[0]>='А'and i[0]<='Я'):
            Zag+=1
        for j in i:
            if(j>='a'and j<='z'or j>='A'and j<='Z'):
                lat+=1
                break
        if(len(i)<=3):
            dlin+=1
        if(i.count('-')>0):
            dev+=1
        if(i>maxs):
            maxs=i
    print("колво слов:",len(c))    
    print("слово с Загл кирил симфол:" ,Zag)
    print("слово с лат символ:", lat)
    print("слово не привыш 3:", dlin)
    print("слово с дефисом:", dev)
    print("len макс слово:", maxs)
    print("макс слово:", len(maxs))
    